www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\inc\Collection-b\show.asp

    <%@language=vbscript codepage=936 %>


<%

Dim SqlItem,RsItem
response.buffer=true
%>
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="Admin_ChkPurview.asp"-->
<%
if request("id")="" then response.end
Set RsItem=server.createobject("adodb.recordset")         
SqlItem="select * from ND_Article where ID=" & request("id")
RsItem.open SqlItem,Conn,1,1
response.write "<center>"
response.write rsitem("title") & "</center><hr>"
response.write rsitem("Content")
rsitem.close
set rsitem=nothing
%>